﻿<!--#include file="const.inc"-->
<%
'====================================================================
' 感谢使用晴天3G智能建站系统..
' 作者:梁永强.QQ:766750857
' 官方网址:wap.qt3g.com
' 声明:软件版权归作者所有,没有经过作者本人同意不得非法破解和传播本程序
'====================================================================
%>
<%
urls=Request.QueryString("urls")
if urls="" then urls="index.asp"
select case v
case "0"
we0="<br/>"
hr="-------------<br/>"
%>
<card title="手机品牌"><p align="<%=qingtian.px%>">
<%
case "1"
hr=""
zi="<span style=""color:#FF5500"">"
zi0="</span>"
we="<div class=""footer"">"
sou="<div class=""block4"">"
dao="<div class=""navi"">"
we0="</div>"
we1="</div>"
%>
<title>手机品牌</title>
</head>
<body>
<!--#include virtual="/css.inc"-->
<%

End Select

%>		
<%=dao%>选择手机品牌<%=we1%><%=we%>
<%
Set Rs = Server.CreateObject("Adodb.Recordset")
Sql = "select id,name from qingtian_phonetai order by id desc"
Rs.Open Sql,conn,1,1
if not (rs.bof and rs.eof)  then
For i=1 to rs.RecordCount
		If Rs.Eof Then
			exit For
		End If

Response.Write("<a href='search_phone.asp?urls="&urls&"&amp;kw="&server.URLEncode(rs("name"))&"&amp;sid="&sidd&"'>"&qingtian.utf8(rs("name"))&"</a> ")
	 	Rs.MoveNext
	  	Next
 	end if
Rs.close
set rs=nothing
%>
<%=we0%>
<%=sou%><a href="/phone.asp?sid=<%=sidd%>">返回机型定制</a><%=we0%>
<%=we%><a href="<%=qingtian.backurl(urls)%>">返回来源页.</a><%=we0%>
   <%
end Function
%>
